open Reprocessing_Common

let white = {r: 1., g: 1., b: 1., a: 1.}

let black = {r: 0., g: 0., b: 0., a: 1.}

let red = {r: 1., g: 0., b: 0., a: 1.}

let green = {r: 0., g: 1., b: 0., a: 1.}

let blue = {r: 0., g: 0., b: 1., a: 1.}

let pi = 4.0 *. atan(1.0)

let two_pi = 2.0 *. pi

let half_pi = 0.5 *. pi

let quarter_pi = 0.25 *. pi

let tau = two_pi
